Old Testament Foundatiosn with Philip Yancey/Old Testament Foundatiosn with Philip Yancey - Disc 1.iso/pc/data/b026par.dir/00074.ls

Text File | 1996-09-06 | 847 b | 27 lines

on mouseDown
  global gCurrentNumber, gTotalNumofPages, gQuestion
  if gCurrentNumber > 1 then
    set the castNum of sprite 14 to cast "b017"
    if pressButton(14) then
      set gCurrentNumber to gCurrentNumber - 1
      if gQuestion then
        set myText to "geo.q" & gCurrentNumber
        set myPageNum to gCurrentNumber & "-" & gTotalNumofPages
      else
        set myText to "geo.a" & gCurrentNumber
        set myPageNum to gCurrentNumber & "-" & gTotalNumofPages
      end if
      pupSprites(11, 14, 1)
      set the castNum of sprite 11 to cast myText
      set the castNum of sprite 12 to cast myPageNum
      set the castNum of sprite 13 to cast "b015"
      if gCurrentNumber = 1 then
        set the castNum of sprite 14 to cast "blankprevious"
      end if
      updateStage()
    else
      nothing()
    end if
  end if
end